home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / dev / c / libiconv_src.lha / src / euc_kr.h < prev    next >
Encoding:
C/C++ Source or Header  |  2000-11-07  |  1.1 KB  |  56 lines
  1.  
  2. /*
  3.  * EUC-KR
  4.  */
  5.  
  6. /* Specification: RFC 1557 */
  7.  
  8. static int
  9. euc_kr_mbtowc (conv_t conv, wchar_t *pwc, const unsigned char *s, int n)
  10. {
  11.   unsigned char c = *s;
  12.   /* Code set 0 (ASCII or KS C 5636-1993) */
  13.   if (c < 0x80)
  14.     return ascii_mbtowc(conv,pwc,s,n);
  15.   /* Code set 1 (KS C 5601-1992) */
  16.   if (c >= 0xa1 && c < 0xff) {
  17.     if (n < 2)
  18.       return RET_TOOFEW(0);
  19.     {
  20.       unsigned char c2 = s[1];
  21.       if (c2 >= 0xa1 && c2 < 0xff) {
  22.         unsigned char buf[2];
  23.         buf[0] = c-0x80; buf[1] = c2-0x80;
  24.         return ksc5601_mbtowc(conv,pwc,buf,2);
  25.       } else
  26.         return RET_ILSEQ;
  27.     }
  28.   }
  29.   return RET_ILSEQ;
  30. }
  31.  
  32. static int
  33. euc_kr_wctomb (conv_t conv, unsigned char *r, wchar_t wc, int n)
  34. {
  35.   unsigned char buf[2];
  36.   int ret;
  37.  
  38.   /* Code set 0 (ASCII or KS C 5636-1993) */
  39.   ret = ascii_wctomb(conv,r,wc,n);
  40.   if (ret != RET_ILSEQ)
  41.     return ret;
  42.  
  43.   /* Code set 1 (KS C 5601-1992) */
  44.   ret = ksc5601_wctomb(conv,buf,wc,2);
  45.   if (ret != RET_ILSEQ) {
  46.     if (ret != 2) abort();
  47.     if (n < 2)
  48.       return RET_TOOSMALL;
  49.     r[0] = buf[0]+0x80;
  50.     r[1] = buf[1]+0x80;
  51.     return 2;
  52.   }
  53.  
  54.   return RET_ILSEQ;
  55. }
  56.